[@wings]
{
Hello there, i am the Beautician and i also sell the latest\
fashion accessories, what would you like to to?\
 <Change name colour!/@ChangeNameColor> Free free!\
 <Buy Wings/@buy> the latest fashion accessory.\
 <Sell Wings/@sell> sell back to me if you aint happy!\
\ \
 <Horses/@horse> Ride around mir faster!\
 <New Hair Styles/@hair> The ultimate fashion!\

;===========================================================

[@color]
Welcome to the name color changer service.\ \


<Change my name color/@ChangeNameColor>\
<Exit/@exit>

[@ChangeNameColor]
Please pick a color.\ \

<Black/@doblack> | <Dark blue/@dodarkblue> | <Green/@dolightblue> | <Purple/@doyellow> | <Teal/@dolightpurple> | <White/@dodarkred> | <Dark Red/@dowhite> \
<Light Green/@dolightgreen> | <Grey/@dolightred> | <Dark Pink/@dodarkpink> | <Light Pink/@dolightpink> | <Dark Orange/@dodarkorange>


[@doblack]
#IF
#ACT
CHANGENAMECOLOR 0
goto @doend

[@dowhite]
#IF
#ACT
CHANGENAMECOLOR 1
goto @doend

[@dolightblue]
#IF
#ACT
CHANGENAMECOLOR 2
goto @doend

[@dolightpurple]
#IF
#ACT
CHANGENAMECOLOR 3
goto @doend

[@dodarkblue]
#IF
#ACT
CHANGENAMECOLOR 4
goto @doend

[@doyellow]
#IF
#ACT
CHANGENAMECOLOR 5
goto @doend

[@dolightgreen]
#IF
#ACT
CHANGENAMECOLOR 6
goto @doend

[@dolightred]
#IF
#ACT
CHANGENAMECOLOR 7
goto @doend

[@dodarkgrey]
#IF
#ACT
CHANGENAMECOLOR 8
goto @doend

[@dolightgrey]
#IF
#ACT
CHANGENAMECOLOR 9
goto @doend

[@dolightorange]
#IF
#ACT
CHANGENAMECOLOR 13
goto @doend

[@dodarkorange]
#IF
#ACT
CHANGENAMECOLOR 188
goto @doend

[@dolightbrown]
#IF
#ACT
CHANGENAMECOLOR 222
goto @doend

[@dodarkbrown]
#IF
#ACT
CHANGENAMECOLOR 223
goto @doend

[@dodarkred]
#IF
#ACT
CHANGENAMECOLOR 231
goto @doend

[@dolightpink]
#IF
#ACT
CHANGENAMECOLOR 225
goto @doend

[@dodarkpink]
#IF
#ACT
CHANGENAMECOLOR 237
goto @doend

[@dodarkpurple]
#IF
#ACT
CHANGENAMECOLOR 251
goto @doend

[@dokarki]
#IF
#ACT
CHANGENAMECOLOR 253
goto @doend

[@dodarkgreen]
#IF
#ACT
CHANGENAMECOLOR 254
goto @doend


[@doend]
#IF
#SAY
Your Name Color has changed.\ \

<Change again/@ChangeNameColor>\
<Exit/@exit>

;;Wings

[@buy]
Which wings would you like to Buy?\ \
 <Back/@wings> <Exit/@exit>\

[@sell]
Which wings would you like to Sell?\ \
 <Back/@wings> <Exit/@exit>\

[goods]
WizBlueWing 5	10
TaoBlueWing 5	10
WarBlueWing 5	10
WizYellowWing 5	10
TaoYellowWing 5	10
WarYellowWing 5	10
WizPurpleWing 5	10
TaoPurpleWing 5	10
WarPurpleWing 5	10
WizGreenWing 5	10
TaoGreenWing 5	10
WarGreenWing 5	10
WizRedWing 5	10
TaoRedWing 5	10
WarGreenWing 5	10

;;Horses

[@horse]
#IF
checknamelist horsequest1.txt
#ACT
goto @page3
break

#IF
checknamelist horsequest2.txt
#ACT
goto @hasitems
break

#ELSEACT
goto @begin

[@begin]
Hello! Hello! Hello! Hello! Oh i said that four four\
times, sorry I have a little dis-dis-disorder but I\
wont trouble you with my problems.\
\
My name is Sam, and my lov-lov... Love is my life is\
horses, they help me and i help them and when i think\
about horses my problems go away, see!\
\
<Page 2/@page2> / <exit/@exit>

[@page2]
#ACT
addnamelist horsequest1.txt
goto @page3

[@page3]
#IF
checkitem SpiderWeb 1
checkitem BugShell 1
checkitem Bone 1
checkitem LargeBone 1
checkitem EbonyFruit 1
checkitem SunPotion 1
checkgold 50000
#ACT
take SpiderWeb 1
take BugShell 1
take LargeBone 1
take EbonyFruit 1
take SunPotion 1
take bone 1
take gold 50000
delnamelist horsequest1.txt
addnamelist horsequest2.txt
goto @hasitems
#ELSEACT
goto @page4

[@page4]
If.... you want! I can give you a hor-horse but i need\
some items from all around the world, so if your ready!\
Bring me:\
<1 Spider Web>, <1 Bug Shell>, <1 Bone>, <1 Large Bone>,\
<1 Ebony Fruit>, <1 SunPotion> oh and i will need <50K>!\
<exit/@exit>

[@hasitems]
Thank you, Each item you provided me is useful for the\
development of horses, NOT ENOUGH PE PEOPLE have ho-ho-\
horses and i want that to change, god i love horses!...!\
<What horse would you like to bo-bo-borrow?>\ \
<White Horse/@white> | <Red Horse/@red> | <Black Horse/@black> | <Brown/@brown>\
Each one will cost you 20k

[@white]
#IF
checkgold 20000
#ACT
take gold 20000
give WhiteHorse 1
#ELSEACT
goto @notenough

[@red]
#IF
checkgold 20000
#ACT
take gold 20000
give RedHorse 1
#ELSEACT
goto @notenough

[@brown]
#IF
checkgold 20000
#ACT
take gold 20000
give BrownHorse 1
#ELSEACT
goto @notenough

[@black]
#IF
checkgold 20000
#ACT
take gold 20000
give BlackHorse 1
#ELSEACT
goto @notenough

[@notenough]
Sa sa sadly you dont have enough gold!\
<exit/@exit>

;;Hair by MentaL

[@hair]
Hi, at the moment given the current styles in mir i can\
only give you TWO hair styles, one you have currently and\
another, so decide the style you want, but my fee per cut\
is a straight up <20,000> gold but lasts forever, unless\
your hair grows, which i doubt!\
<Show me the styles/@checkhair> | <No Thanks/@exit>

[@checkhair]
#IF
gender man
#ACT
goto @man

#ELSEACT
goto @woman

[@man]
<$USERNAME>, at RaGEZONE, less is more, or more is less\
well i cannot remember the exact saying <MentaL> used to\
tell me but anyways, which hair style would you like!!!\
\
<I would like normal hair/@bald> | <I would like bald hair/@standard>\
<exit/@exit>

[@woman]
<$USERNAME>, at RaGEZONE, less is more, or more is less\
well i cannot remember the exact saying <MentaL> used to\
tell me but anyways, which hair style would you like!!!\
\
<I would like red hair/@blue> | <I would like blue hair/@standard1>\
<exit/@exit>

[@bald]
#IF
checkgold 20000
#ACT
take gold 20000
HAIRSTYLE 1
goto @hairdone
#ELSEACT
goto @error

[@standard]
#IF
checkgold 20000
#ACT
take gold 20000
HAIRSTYLE 0
goto @hairdone
#ELSEACT
goto @error

[@blue]
#IF
checkgold 20000
#ACT
take gold 20000
HAIRSTYLE 1
goto @hairdone
#ELSEACT
goto @error

[@standard1]
#IF
checkgold 20000
#ACT
take gold 20000
HAIRSTYLE 0
goto @hairdone
#ELSEACT
goto @error

[@error]
Sorry, but you do not have enough gold!\
<exit/@exit>

[@hairdone]
I have done your hair!!! Enjoy it!\
<exit/@exit>


}